object frmExibeCNPJ: TfrmExibeCNPJ
  Left = 359
  Top = 167
  Width = 350
  Height = 168
  Caption = 'Exibir CPF/CNPJ'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object cxGroupBox1: TcxGroupBox
    Left = 4
    Top = 3
    Caption = 'CPF/CNPJ'
    TabOrder = 0
    Height = 85
    Width = 328
    object Label1: TcxLabel
      Left = 8
      Top = 24
      Caption = 'S/M'#225'scara'
      ParentFont = False
      Transparent = True
    end
    object cxDBTextEdit4: TcxDBTextEdit
      Left = 8
      Top = 42
      DataBinding.DataField = 'cnpj'
      DataBinding.DataSource = dsCNPJ
      Properties.CharCase = ecUpperCase
      TabOrder = 0
      Width = 153
    end
    object cxLabel1: TcxLabel
      Left = 163
      Top = 23
      Caption = 'C/M'#225'scara'
      ParentFont = False
      Transparent = True
    end
    object edtcnpj: TcxDBMaskEdit
      Left = 164
      Top = 42
      DataBinding.DataField = 'CNPJ'
      DataBinding.DataSource = dsCNPJ
      Properties.EditMask = '##.###.###/####-##;1;_'
      Properties.MaxLength = 0
      Properties.ValidateOnEnter = False
      TabOrder = 3
      Width = 158
    end
  end
  object cxButton2: TcxButton
    Left = 252
    Top = 96
    Width = 75
    Height = 25
    Caption = 'Cancelar'
    TabOrder = 3
    OnClick = cxButton2Click
  end
  object cxButton1: TcxButton
    Left = 87
    Top = 96
    Width = 75
    Height = 25
    Caption = 'SIRIC'
    TabOrder = 2
    OnClick = cxButton1Click
  end
  object cxButton3: TcxButton
    Left = 7
    Top = 96
    Width = 75
    Height = 25
    Caption = 'Form. Caixa'
    TabOrder = 1
    OnClick = cxButton3Click
  end
  object QryClientes: TADOQuery
    Connection = dmPrincipal.ADOConnection
    Parameters = <
      item
        Name = 'codigo'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    SQL.Strings = (
      'SELECT tb.cnpj, tb.tipo'
      'FROM tb_conta AS tb'
      'WHERE (tb.codigo = :codigo);')
    Left = 221
    Top = 9
    object QryClientescnpj: TWideStringField
      FieldName = 'cnpj'
      Size = 18
    end
    object QryClientestipo: TWideStringField
      FieldName = 'tipo'
      Size = 1
    end
  end
  object dsCNPJ: TDataSource
    DataSet = QryClientes
    Left = 253
    Top = 8
  end
  object ACBrEnterTab1: TACBrEnterTab
    EnterAsTab = True
    Left = 285
    Top = 10
  end
end
